Visual Basic Toolbox/Visual Basic Toolbox (P.I.E.)(1996).ISO/forms/jr3dct/form6.frm

Visual Basic Form | 1995-02-15 | 5.1 KB | 188 lines

VERSION 2.00
Begin Form Form6
   BackColor       =   &H00C0C0C0&
   Caption         =   "Form6"
   ClientHeight    =   3780
   ClientLeft      =   1245
   ClientTop       =   1605
   ClientWidth     =   7485
   Height          =   4245
   Left            =   1155
   LinkTopic       =   "Form6"
   ScaleHeight     =   3780
   ScaleWidth      =   7485
   Top             =   1230
   Width           =   7665
   Begin SSCommand Command3D1
      Caption         =   "Command3D1"
      Height          =   420
      Left            =   1320
      TabIndex        =   18
      Top             =   1215
      Width           =   1455
   End
   Begin SSCheck Check3D1
      Caption         =   "Check3D1"
      Height          =   285
      Left            =   1320
      TabIndex        =   17
      Top             =   810
      Value           =   -1  'True
      Width           =   1455
   End
   Begin SSOption Option3D1
      Caption         =   "Option3D1"
      Height          =   285
      Left            =   1320
      TabIndex        =   16
      Top             =   270
      Width           =   1575
   End
   Begin SSFrame Frame3D1
      Caption         =   "Frame3D1"
      ForeColor       =   &H00000000&
      Height          =   1365
      Left            =   960
      TabIndex        =   13
      Top             =   1890
      Width           =   2175
      Begin ComboBox Combo3
         Height          =   300
         Left            =   360
         TabIndex        =   14
         Text            =   "Combo3"
         Top             =   810
         Width           =   1695
      End
      Begin TextBox Text3
         Height          =   285
         Left            =   360
         TabIndex        =   15
         Text            =   "Text3"
         Top             =   405
         Width           =   1575
      End
   End
   Begin PictureBox Picture1
      Height          =   555
      Left            =   3480
      ScaleHeight     =   525
      ScaleWidth      =   705
      TabIndex        =   10
      Top             =   675
      Width           =   735
   End
   Begin VScrollBar VScroll1
      Height          =   1365
      Left            =   4560
      TabIndex        =   9
      Top             =   135
      Width           =   255
   End
   Begin HScrollBar HScroll1
      Height          =   285
      Left            =   3000
      TabIndex        =   8
      Top             =   1350
      Width           =   1455
   End
   Begin ListBox List1
      Height          =   420
      Left            =   5160
      TabIndex        =   7
      Top             =   945
      Width           =   1815
   End
   Begin ComboBox Combo1
      Height          =   300
      Left            =   3840
      TabIndex        =   6
      Text            =   "Combo1"
      Top             =   3375
      Width           =   1695
   End
   Begin OptionButton Option1
      Caption         =   "Option1"
      Height          =   285
      Left            =   4920
      TabIndex        =   5
      Top             =   540
      Width           =   2175
   End
   Begin CheckBox Check1
      Caption         =   "Check1"
      Height          =   285
      Left            =   5040
      TabIndex        =   4
      Top             =   135
      Width           =   2055
   End
   Begin CommandButton Command1
      Caption         =   "Unload"
      Height          =   420
      Left            =   5760
      TabIndex        =   3
      Top             =   2970
      Width           =   1335
   End
   Begin Frame Frame1
      BackColor       =   &H00C0C0C0&
      Caption         =   "Frame1"
      Height          =   1365
      Left            =   3240
      TabIndex        =   2
      Top             =   1890
      Width           =   2295
      Begin ComboBox Combo2
         Height          =   300
         Left            =   120
         TabIndex        =   12
         Text            =   "Combo2"
         Top             =   810
         Width           =   1815
      End
      Begin TextBox Text2
         Height          =   285
         Left            =   120
         TabIndex        =   11
         Text            =   "Text2"
         Top             =   405
         Width           =   1935
      End
   End
   Begin TextBox Text1
      Height          =   285
      Left            =   5880
      TabIndex        =   1
      Text            =   "Text1"
      Top             =   1890
      Width           =   1215
   End
   Begin Label Label1
      Caption         =   "Label1"
      Height          =   285
      Left            =   5040
      TabIndex        =   0
      Top             =   1485
      Width           =   2295
   End
Option Explicit
Sub Command1_Click ()
    Form1.WindowState = 0
    Unload Form6
End Sub
Sub Form_Activate ()
    'Got Active
End Sub
Sub Form_GotFocus ()
    'Got Focus
End Sub
Sub Form_Paint ()
    Frame3d1.Refresh
    r = JR3DLook(hWnd, Raised)
End Sub
Sub Form_Resize ()
    Frame3d1.Refresh
    r = JR3DLook(hWnd, Raised)
End Sub